home *** CD-ROM | disk | FTP | other *** search
- echo off
- rem (fh)--------------------------------------------= demo.bat =--
- rem
- rem This file was
- rem written on the CRAY-X by= G. Mark at= 31-01-90 18:20
- rem Quantum Theory Group, Institute of Physics, TU Budapest
- rem modified in TU Budapest QTG by= Mark Geza at= 26-03-90 19:23
- rem
- rem (fh)----------------------------------------------------------------
-
- :start
-
- rem ================================================
- rem = Type the MENU
- rem ================================================
-
- cls
- type exlst.txt
-
- rem ================================================
- rem = CHOOSE.COM from the following book:
- rem = J. Kamin: MS DOS Power Users Guide Vol I. p124
- rem = SYBEX, San Francisco-Paris-Dusseldorf-London
- rem = (C) 1986
- rem ================================================
-
- choose QXHGFEDCBA
-
- REM REMEMBER THAT CHOICES MUST BE LISTED IN REVERSE ORDER.
- REM NOW GO RUN THE PROGRAM REQUESTED.
-
- if errorlevel 9 goto vege
- if errorlevel 8 goto help
- if errorlevel 7 english barotwo 20 -p
- if errorlevel 6 english baro 100 -p
- if errorlevel 5 english maxwell 50 -p
- if errorlevel 4 english entrop 100 -p
- if errorlevel 3 english twopeak 200 -p
- if errorlevel 2 english relax 200 -p
- if errorlevel 1 english nocoll 200 -p
- if errorlevel 0 english veldistr 200
-
- goto vege
-
- :help
-
- echo.
- echo Please enter the experiment label you want HELP about :
-
- choose HGFEDCBA
-
- REM REMEMBER THAT CHOICES MUST BE LISTED IN REVERSE ORDER.
- REM NOW GO RUN THE PROGRAM REQUESTED.
-
- if errorlevel 7 english barotwo h
- if errorlevel 6 english baro h
- if errorlevel 5 english maxwell h
- if errorlevel 4 english entrop h
- if errorlevel 3 english twopeak h
- if errorlevel 2 english relax h
- if errorlevel 1 english nocoll h
- if errorlevel 0 english veldistr h
-
-
- :vege
-
-